object Form_Main: TForm_Main Left = 253 Top = 156 Width = 512 Height = 459 BorderIcons = [biSystemMenu, biMinimize] Caption = 'Import danych' Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnClose = FormClose PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 70 Width = 126 Height = 13 Caption = 'Faktury Express wersja 3,4' end object Label2: TLabel Left = 16 Top = 100 Width = 117 Height = 13 Caption = 'Faktury Express wersja 5' end object ED_Dir1: TEdit Left = 152 Top = 66 Width = 217 Height = 21 TabOrder = 0 end object ED_Dir2: TEdit Left = 152 Top = 98 Width = 217 Height = 21 TabOrder = 1 end object btnDir1: TButton Left = 384 Top = 64 Width = 105 Height = 25 Caption = 'Wybierz katalog...' TabOrder = 2 OnClick = btnDir1Click end object btnDir2: TButton Left = 384 Top = 96 Width = 105 Height = 25 Caption = 'Wybierz katalog...' TabOrder = 3 OnClick = btnDir2Click end object btnStart: TButton Left = 272 Top = 192 Width = 105 Height = 25 Caption = 'Start' TabOrder = 4 OnClick = btnStartClick end object btnZamknij: TButton Left = 384 Top = 192 Width = 105 Height = 25 Caption = 'Zamknij' TabOrder = 5 OnClick = btnZamknijClick end object GroupBox1: TGroupBox Left = 16 Top = 128 Width = 473 Height = 57 Caption = 'Tabele' TabOrder = 6 object checkTowary: TCheckBox Left = 160 Top = 16 Width = 65 Height = 17 Caption = 'Towary' TabOrder = 0 end object checkKontrahenci: TCheckBox Left = 8 Top = 32 Width = 81 Height = 17 Caption = 'Kontrahenci' TabOrder = 1 end object checkSprzedawcy: TCheckBox Left = 8 Top = 16 Width = 145 Height = 17 Caption = 'Sprzedawcy (+numeracje)' TabOrder = 2 end object checkFaktury: TCheckBox Left = 224 Top = 16 Width = 65 Height = 17 Caption = 'Faktury' TabOrder = 3 end object checkFExpo: TCheckBox Left = 336 Top = 16 Width = 113 Height = 17 Caption = 'Faktury exportowe' TabOrder = 4 end object checkFKoryg: TCheckBox Left = 224 Top = 32 Width = 121 Height = 17 Caption = 'Faktury koryguj�ce' TabOrder = 5 end object checkNoty: TCheckBox Left = 336 Top = 32 Width = 97 Height = 17 Caption = 'Noty koryguj�ce' TabOrder = 6 end object checkNotes: TCheckBox Left = 160 Top = 32 Width = 65 Height = 17 Caption = 'Notatki' TabOrder = 7 end end object btnPomoc: TButton Left = 160 Top = 192 Width = 105 Height = 25 Caption = 'Pomoc' TabOrder = 7 OnClick = btnPomocClick end object ProgressBar: TProgressBar Left = 0 Top = 416 Width = 504 Height = 16 Align = alBottom Min = 0 Max = 100 TabOrder = 8 end object Memo: TMemo Left = 16 Top = 232 Width = 473 Height = 169 TabOrder = 9 end object GB_Wersja: TGroupBox Left = 16 Top = 8 Width = 473 Height = 49 Caption = 'Wybierz wersj� z kt�rej chcesz przekopiowa� dane' TabOrder = 10 object RB_Wersja_3: TRadioButton Left = 128 Top = 22 Width = 73 Height = 17 Caption = 'Wersja 3' Checked = True TabOrder = 0 TabStop = True OnClick = RB_Wersja_3Click end object RB_Wersja_4: TRadioButton Left = 248 Top = 22 Width = 65 Height = 17 Caption = 'Wersja 4' TabOrder = 1 OnClick = RB_Wersja_4Click end end object old_Towary: TTable TableName = 'old\Towary.db' Left = 24 Top = 240 end object old_Kontrahenci: TTable TableName = 'old\Kontrahenci.db' Left = 88 Top = 240 end object old_Sprzedawcy: TTable TableName = 'old\Sprzedawcy.db' Left = 120 Top = 240 end object new_Towary: TTable TableName = 'new\Towary.db' Left = 24 Top = 288 object new_TowaryIdent: TStringField FieldName = 'Ident' Size = 100 end object new_TowaryNazwa: TStringField FieldName = 'Nazwa' Size = 250 end object new_TowaryNetto: TFloatField FieldName = 'Netto' end object new_TowaryBrutto: TFloatField FieldName = 'Brutto' end object new_TowaryJm: TStringField FieldName = 'Jm' Size = 10 end object new_TowaryKod: TStringField FieldName = 'Kod' Size = 100 end object new_TowaryOpis: TStringField FieldName = 'Opis' Size = 250 end object new_TowaryPKWiU: TStringField FieldName = 'PKWiU' end object new_TowaryKlasa: TStringField FieldName = 'Klasa' Size = 10 end object new_TowaryMagazyn: TFloatField FieldName = 'Magazyn' end object new_TowaryNr: TIntegerField FieldName = 'Nr' end object new_TowaryMinimum: TFloatField FieldName = 'Minimum' end object new_TowaryVAT: TStringField FieldName = 'VAT' Size = 3 end end object new_Kontrahenci: TTable TableName = 'new\Kontrahenci.db' Left = 88 Top = 288 object new_KontrahenciIdent: TStringField FieldName = 'Ident' Size = 100 end object new_KontrahenciNr: TIntegerField FieldName = 'Nr' end object new_KontrahenciNazwisko: TStringField FieldName = 'Nazwisko' Size = 50 end object new_KontrahenciFirma: TStringField FieldName = 'Firma' Size = 250 end object new_KontrahenciUlica: TStringField FieldName = 'Ulica' Size = 50 end object new_KontrahenciMiejscowosc: TStringField FieldName = 'Miejscowosc' Size = 30 end object new_KontrahenciKod: TStringField FieldName = 'Kod' Size = 10 end object new_KontrahenciTelefon: TStringField FieldName = 'Telefon' Size = 35 end object new_KontrahenciFaks: TStringField FieldName = 'Faks' Size = 35 end object new_KontrahenciEmail: TStringField FieldName = 'Email' Size = 50 end object new_KontrahenciGG: TStringField FieldName = 'GG' Size = 10 end object new_KontrahenciNIP: TStringField FieldName = 'NIP' Size = 30 end object new_KontrahenciREGON: TStringField FieldName = 'REGON' Size = 30 end object new_KontrahenciBank: TStringField FieldName = 'Bank' Size = 50 end object new_KontrahenciNr_rku1: TStringField FieldName = 'Nr_rku1' Size = 2 end object new_KontrahenciNr_rku2: TStringField FieldName = 'Nr_rku2' Size = 8 end object new_KontrahenciNr_rku3: TStringField FieldName = 'Nr_rku3' Size = 100 end object new_KontrahenciRabat: TIntegerField FieldName = 'Rabat' end object new_KontrahenciUwagi: TStringField FieldName = 'Uwagi' Size = 250 end object new_KontrahenciKraj: TStringField FieldName = 'Kraj' Size = 100 end object new_KontrahenciNr_rej: TStringField FieldName = 'Nr_rej' end object new_KontrahenciUsuniety: TBooleanField FieldName = 'Usuniety' end end object new_Sprzedawcy: TTable TableName = 'new\Sprzedawcy.db' Left = 120 Top = 288 object new_SprzedawcyIdent: TStringField FieldName = 'Ident' Size = 100 end object new_SprzedawcyId_numeracji: TStringField FieldName = 'Id_numeracji' Size = 30 end object new_SprzedawcyNazwisko: TStringField FieldName = 'Nazwisko' Size = 50 end object new_SprzedawcyFirma: TStringField FieldName = 'Firma' Size = 250 end object new_SprzedawcyUlica: TStringField FieldName = 'Ulica' Size = 50 end object new_SprzedawcyMiejscowosc: TStringField FieldName = 'Miejscowosc' Size = 30 end object new_SprzedawcyKod: TStringField FieldName = 'Kod' Size = 10 end object new_SprzedawcyTelefon: TStringField FieldName = 'Telefon' Size = 35 end object new_SprzedawcyFaks: TStringField FieldName = 'Faks' Size = 35 end object new_SprzedawcyEmail: TStringField FieldName = 'Email' Size = 50 end object new_SprzedawcyGG: TStringField FieldName = 'GG' Size = 10 end object new_SprzedawcyNIP: TStringField FieldName = 'NIP' Size = 30 end object new_SprzedawcyREGON: TStringField FieldName = 'REGON' Size = 30 end object new_SprzedawcyBank: TStringField FieldName = 'Bank' Size = 50 end object new_SprzedawcyNr_rku1: TStringField FieldName = 'Nr_rku1' Size = 2 end object new_SprzedawcyNr_rku2: TStringField FieldName = 'Nr_rku2' Size = 8 end object new_SprzedawcyNr_rku3: TStringField FieldName = 'Nr_rku3' Size = 100 end object new_SprzedawcyNr_dowodu: TStringField FieldName = 'Nr_dowodu' Size = 11 end object new_SprzedawcyDowod_Data: TDateField FieldName = 'Dowod_Data' end object new_SprzedawcyDowod_Wydawca: TStringField FieldName = 'Dowod_Wydawca' Size = 100 end object new_SprzedawcySiedlisko: TStringField FieldName = 'Siedlisko' end object new_SprzedawcyNr: TIntegerField FieldName = 'Nr' end end object old_Faktury: TTable TableName = 'old\wyst_faktury.db' Left = 152 Top = 240 end object new_Faktury: TTable TableName = 'new\Faktury.db' Left = 152 Top = 288 object new_FakturyNr_faktury: TStringField FieldName = 'Nr_faktury' Size = 25 end object new_FakturyId_sprzedawcy: TStringField FieldName = 'Id_sprzedawcy' Size = 100 end object new_FakturyId_kontrahenta: TStringField FieldName = 'Id_kontrahenta' Size = 100 end object new_FakturyRodzaj: TIntegerField FieldName = 'Rodzaj' end object new_FakturyData_wyst: TDateField FieldName = 'Data_wyst' end object new_FakturyData_pl: TDateField FieldName = 'Data_pl' end object new_FakturyForma_pl: TStringField FieldName = 'Forma_pl' end object new_FakturyNetto: TFloatField FieldName = 'Netto' end object new_FakturyWartoscVAT: TFloatField FieldName = 'WartoscVAT' end object new_FakturyBrutto: TFloatField FieldName = 'Brutto' end object new_FakturyData_sp: TDateField FieldName = 'Data_sp' end object new_FakturyTermin_pl: TStringField FieldName = 'Termin_pl' end object new_FakturyZamowienie: TStringField FieldName = 'Zamowienie' end object new_FakturySp_wysylki: TStringField FieldName = 'Sp_wysylki' end object new_FakturyMies_sp: TIntegerField FieldName = 'Mies_sp' end object new_FakturyRodz_wy: TIntegerField FieldName = 'Rodz_wy' end object new_FakturyRabat: TIntegerField FieldName = 'Rabat' end object new_FakturyZaplacona: TBooleanField FieldName = 'Zaplacona' end object new_FakturyNumerFakt: TIntegerField FieldName = 'NumerFakt' end object new_FakturyWplacono: TFloatField FieldName = 'Wplacono' end object new_FakturyPozostalo: TFloatField FieldName = 'Pozostalo' end object new_FakturyMiejsce_wyst: TStringField FieldName = 'Miejsce_wyst' end object new_FakturyWaluta: TStringField FieldName = 'Waluta' Size = 10 end object new_FakturyKurs: TFloatField FieldName = 'Kurs' end object new_FakturyRodz_fa: TIntegerField FieldName = 'Rodz_fa' end object new_FakturyUwagi: TStringField FieldName = 'Uwagi' Size = 100 end end object old_Pozycje: TTable TableName = 'old\wyst_pozycje.db' Left = 184 Top = 240 end object new_Pozycje: TTable TableName = 'new\Wyst_pozycje.db' Left = 184 Top = 288 object new_PozycjeNr_faktury: TStringField FieldName = 'Nr_faktury' Size = 25 end object new_PozycjeLp: TIntegerField FieldName = 'Lp' end object new_PozycjeNazwa: TStringField FieldName = 'Nazwa' Size = 250 end object new_PozycjeIlosc: TFloatField FieldName = 'Ilosc' end object new_PozycjeVAT: TStringField FieldName = 'VAT' Size = 3 end object new_PozycjeJm: TStringField FieldName = 'Jm' Size = 10 end object new_PozycjeNetto: TFloatField FieldName = 'Netto' end object new_PozycjeKwotaVAT: TFloatField FieldName = 'KwotaVAT' end object new_PozycjeBrutto: TFloatField FieldName = 'Brutto' end object new_PozycjeNetto_jedn: TFloatField FieldName = 'Netto_jedn' end object new_PozycjePKWiU: TStringField FieldName = 'PKWiU' end object new_PozycjeKlasa: TStringField FieldName = 'Klasa' Size = 10 end object new_PozycjeRabatPr: TFloatField FieldName = 'RabatPr' end object new_PozycjeWydano: TBooleanField FieldName = 'Wydano' end end object Query1: TQuery DataSource = DataSource1 SQL.Strings = ( 'select * from old_sprzedawcy') Left = 56 Top = 192 end object DataSource1: TDataSource DataSet = new_Sprzedawcy Left = 96 Top = 192 end object old_Numeracje: TTable TableName = 'old\Numeracje.db' Left = 56 Top = 240 end object new_Numeracje: TTable TableName = 'new\Numeracje.db' Left = 56 Top = 288 object new_NumeracjeId_numeracji: TStringField FieldName = 'Id_numeracji' Size = 30 end object new_NumeracjeFormat: TStringField FieldName = 'Format' Size = 30 end object new_NumeracjeAktualny_numer: TStringField FieldName = 'Aktualny_numer' Size = 30 end object new_NumeracjeNrFakturyExpo: TIntegerField FieldName = 'NrFakturyExpo' end object new_NumeracjeNrFakturyWew: TIntegerField FieldName = 'NrFakturyWew' end object new_NumeracjeNrFakturyZal: TIntegerField FieldName = 'NrFakturyZal' end object new_NumeracjeNrFakturyPr: TIntegerField FieldName = 'NrFakturyPr' end object new_NumeracjeNrFakturyKor: TIntegerField FieldName = 'NrFakturyKor' end object new_NumeracjeNrNotyKor: TIntegerField FieldName = 'NrNotyKor' end end object old_Notes: TTable IndexDefs = < item Name = 'NotesIndex1' Fields = 'data' Options = [ixPrimary, ixUnique] end> StoreDefs = True TableName = 'old\Notes.db' Left = 216 Top = 240 end object new_Notes: TTable IndexDefs = < item Name = 'NotesIndex1' Fields = 'data' Options = [ixPrimary, ixUnique] end> StoreDefs = True TableName = 'new\Notes.db' Left = 216 Top = 288 object DateField1: TDateField FieldName = 'data' Required = True end object MemoField1: TMemoField FieldName = 'pn' BlobType = ftMemo Size = 1 end object MemoField2: TMemoField FieldName = 'wt' BlobType = ftMemo Size = 1 end object MemoField3: TMemoField FieldName = 'sr' BlobType = ftMemo Size = 1 end object MemoField4: TMemoField FieldName = 'cz' BlobType = ftMemo Size = 1 end object MemoField5: TMemoField FieldName = 'pt' BlobType = ftMemo Size = 1 end object MemoField6: TMemoField FieldName = 'so' BlobType = ftMemo Size = 1 end object MemoField7: TMemoField FieldName = 'nd' BlobType = ftMemo Size = 1 end end object old_Noty: TTable TableName = 'old\Noty.db' Left = 248 Top = 240 end object new_Noty: TTable TableName = 'new\Faktury_noty.db' Left = 248 Top = 288 object new_NotyNr_noty: TStringField FieldName = 'Nr_noty' Size = 25 end object new_NotyData_wyst: TDateField FieldName = 'Data_wyst' end object new_NotyTrescPrzed: TStringField FieldName = 'TrescPrzed' Size = 250 end object new_NotyTrescPo: TStringField FieldName = 'TrescPo' Size = 250 end object new_NotyNr_faktury: TStringField FieldName = 'Nr_faktury' Size = 25 end end object old_Faktury_expo: TTable TableName = 'old\wyst_faktury_expo.db' Left = 280 Top = 240 end object new_Faktury_expo: TTable TableName = 'new\Faktury_expo.db' Left = 280 Top = 288 object new_Faktury_expoNr_f_expo: TStringField FieldName = 'Nr_f_expo' Size = 25 end object new_Faktury_expoId_sprzedawcy: TStringField FieldName = 'Id_sprzedawcy' Size = 100 end object new_Faktury_expoId_kontrahenta: TStringField FieldName = 'Id_kontrahenta' Size = 100 end object new_Faktury_expoId_odbiorcy: TStringField FieldName = 'Id_odbiorcy' Size = 100 end object new_Faktury_expoData_wyst: TDateField FieldName = 'Data_wyst' end object new_Faktury_expoWaga: TStringField FieldName = 'Waga' end object new_Faktury_expoMiejsce_wyst: TStringField FieldName = 'Miejsce_wyst' end object new_Faktury_expoWarunki: TStringField FieldName = 'Warunki' Size = 250 end object new_Faktury_expoNetto: TFloatField FieldName = 'Netto' end object new_Faktury_expoWartoscVAT: TFloatField FieldName = 'WartoscVAT' end object new_Faktury_expoBrutto: TFloatField FieldName = 'Brutto' end object new_Faktury_expoWaluta: TStringField FieldName = 'Waluta' Size = 10 end end object old_Pozycje_expo: TTable TableName = 'old\wyst_poz_expo.db' Left = 312 Top = 240 end object new_Pozycje_expo: TTable TableName = 'new\wyst_pozycje_expo.db' Left = 312 Top = 288 object new_Pozycje_expoNr_f_expo: TStringField FieldName = 'Nr_f_expo' Size = 25 end object new_Pozycje_expoLp: TIntegerField FieldName = 'Lp' end object new_Pozycje_expoNazwa: TStringField FieldName = 'Nazwa' Size = 250 end object new_Pozycje_expoIlosc: TFloatField FieldName = 'Ilosc' end object new_Pozycje_expoVAT: TStringField FieldName = 'VAT' Size = 3 end object new_Pozycje_expoJm: TStringField FieldName = 'Jm' Size = 10 end object new_Pozycje_expoNetto: TFloatField FieldName = 'Netto' end object new_Pozycje_expoNetto_jedn: TFloatField FieldName = 'Netto_jedn' end object new_Pozycje_expoKwotaVAT: TFloatField FieldName = 'KwotaVAT' end object new_Pozycje_expoBrutto: TFloatField FieldName = 'Brutto' end object new_Pozycje_expoKodTaryfy: TStringField FieldName = 'KodTaryfy' end object new_Pozycje_expoKraj: TStringField FieldName = 'Kraj' end end object old_Faktury_koryg: TTable TableName = 'old\wyst_faktury_kor.db' Left = 344 Top = 240 end object old_Pozycje_koryg: TTable TableName = 'old\wyst_pozycje_kor.db' Left = 376 Top = 240 end object new_Faktury_koryg: TTable TableName = 'new\Faktury_koryg.db' Left = 344 Top = 288 object new_Faktury_korygNr_f_koryg: TStringField FieldName = 'Nr_f_koryg' Size = 25 end object new_Faktury_korygData_wyst: TDateField FieldName = 'Data_wyst' end object new_Faktury_korygData_pl: TDateField FieldName = 'Data_pl' end object new_Faktury_korygForma_pl: TStringField FieldName = 'Forma_pl' end object new_Faktury_korygNetto: TFloatField FieldName = 'Netto' end object new_Faktury_korygWartoscVAT: TFloatField FieldName = 'WartoscVAT' end object new_Faktury_korygBrutto: TFloatField FieldName = 'Brutto' end object new_Faktury_korygRodzaj_kor: TStringField FieldName = 'Rodzaj_kor' Size = 40 end object new_Faktury_korygPrzycz_kor: TStringField FieldName = 'Przycz_kor' Size = 100 end object new_Faktury_korygNr_faktury: TStringField FieldName = 'Nr_faktury' Size = 25 end end object new_Pozycje_koryg: TTable TableName = 'new\Wyst_pozycje_koryg.db' Left = 376 Top = 288 object new_Pozycje_korygNr_f_koryg: TStringField FieldName = 'Nr_f_koryg' Size = 25 end object new_Pozycje_korygLp: TIntegerField FieldName = 'Lp' end object new_Pozycje_korygNazwa: TStringField FieldName = 'Nazwa' Size = 250 end object new_Pozycje_korygIlosc: TFloatField FieldName = 'Ilosc' end object new_Pozycje_korygVAT: TStringField FieldName = 'VAT' Size = 3 end object new_Pozycje_korygJm: TStringField FieldName = 'Jm' Size = 10 end object new_Pozycje_korygNetto: TFloatField FieldName = 'Netto' end object new_Pozycje_korygKwotaVAT: TFloatField FieldName = 'KwotaVAT' end object new_Pozycje_korygBrutto: TFloatField FieldName = 'Brutto' end object new_Pozycje_korygNetto_jedn: TFloatField FieldName = 'Netto_jedn' end object new_Pozycje_korygPKWiU: TStringField FieldName = 'PKWiU' end object new_Pozycje_korygKlasa: TStringField FieldName = 'Klasa' Size = 10 end object new_Pozycje_korygNr_faktury: TStringField FieldName = 'Nr_faktury' Size = 25 end end object old_Sprzedawcy3: TTable TableName = '3\Sprzedawcy.db' Left = 120 Top = 264 object old_Sprzedawcy3Id: TStringField FieldName = 'Id' Size = 10 end object old_Sprzedawcy3Nr: TIntegerField FieldName = 'Nr' end object old_Sprzedawcy3Nazwisko: TStringField FieldName = 'Nazwisko' Size = 50 end object old_Sprzedawcy3Firma: TStringField FieldName = 'Firma' Size = 240 end object old_Sprzedawcy3Ulica: TStringField FieldName = 'Ulica' Size = 40 end object old_Sprzedawcy3Miejscowosc: TStringField FieldName = 'Miejscowosc' end object old_Sprzedawcy3Kod: TStringField FieldName = 'Kod' Size = 10 end object old_Sprzedawcy3Telefon: TStringField FieldName = 'Telefon' Size = 15 end object old_Sprzedawcy3Faks: TStringField FieldName = 'Faks' Size = 15 end object old_Sprzedawcy3Email: TStringField FieldName = 'Email' Size = 40 end object old_Sprzedawcy3NIP: TStringField FieldName = 'NIP' Size = 13 end object old_Sprzedawcy3REGON: TStringField FieldName = 'REGON' Size = 30 end object old_Sprzedawcy3Bank: TStringField FieldName = 'Bank' Size = 50 end object old_Sprzedawcy3Nr_rku1: TStringField FieldName = 'Nr_rku1' Size = 2 end object old_Sprzedawcy3Nr_rku2: TStringField FieldName = 'Nr_rku2' Size = 8 end object old_Sprzedawcy3Nr_rku3: TStringField FieldName = 'Nr_rku3' Size = 100 end object old_Sprzedawcy3Nr_dowodu: TStringField FieldName = 'Nr_dowodu' Size = 11 end end object old_Faktury3: TTable TableName = '3\wyst_faktury.db' Left = 152 Top = 264 object old_Faktury3Nr: TStringField FieldName = 'Nr' end object old_Faktury3Nr_sprzed: TIntegerField FieldName = 'Nr_sprzed' end object old_Faktury3Nr_kontr: TIntegerField FieldName = 'Nr_kontr' end object old_Faktury3Rodzaj: TIntegerField FieldName = 'Rodzaj' end object old_Faktury3Data_wyst: TDateField FieldName = 'Data_wyst' end object old_Faktury3Data_pl: TDateField FieldName = 'Data_pl' end object old_Faktury3Forma_pl: TStringField FieldName = 'Forma_pl' end object old_Faktury3Netto: TCurrencyField FieldName = 'Netto' end object old_Faktury3WartoscVAT: TCurrencyField FieldName = 'WartoscVAT' end object old_Faktury3Brutto: TCurrencyField FieldName = 'Brutto' end object old_Faktury3Data_sp: TDateField FieldName = 'Data_sp' end object old_Faktury3Termin_pl: TStringField FieldName = 'Termin_pl' end object old_Faktury3Zamowienie: TStringField FieldName = 'Zamowienie' end object old_Faktury3Sp_wysylki: TStringField FieldName = 'Sp_wysylki' end object old_Faktury3Mies_sp: TIntegerField FieldName = 'Mies_sp' end object old_Faktury3Rodz_fa: TIntegerField FieldName = 'Rodz_fa' end object old_Faktury3Rodz_wy: TIntegerField FieldName = 'Rodz_wy' end object old_Faktury3Rabat: TIntegerField FieldName = 'Rabat' end object old_Faktury3Zaplacona: TBooleanField FieldName = 'Zaplacona' end object old_Faktury3NumerFakt: TIntegerField FieldName = 'NumerFakt' end end object old_Pozycje3: TTable TableName = '3\wyst_pozycje.db' Left = 184 Top = 264 object old_Pozycje3Lp: TIntegerField FieldName = 'Lp' end object old_Pozycje3Nazwa: TStringField FieldName = 'Nazwa' Size = 255 end object old_Pozycje3Ilosc: TFloatField FieldName = 'Ilosc' end object old_Pozycje3VAT: TStringField FieldName = 'VAT' Size = 3 end object old_Pozycje3Jm: TStringField FieldName = 'Jm' Size = 10 end object old_Pozycje3Netto: TCurrencyField FieldName = 'Netto' end object old_Pozycje3KwotaVAT: TCurrencyField FieldName = 'KwotaVAT' end object old_Pozycje3Brutto: TCurrencyField FieldName = 'Brutto' end object old_Pozycje3Netto_jedn: TCurrencyField FieldName = 'Netto_jedn' end object old_Pozycje3PKWiU: TStringField FieldName = 'PKWiU' end object old_Pozycje3Klasa: TStringField FieldName = 'Klasa' Size = 3 end object old_Pozycje3Nr_faktury: TStringField FieldName = 'Nr_faktury' end end end